home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Apple Reference & Presen…rary 6 (Reseller Edition)
/
Apple Ref. & Pres. Lib.v6.0.toast
/
pc
/
3-Presentations
/
Apple Demos
/
Training
/
HyperCard 2.0 Training
/
•HC 2.0-4
/
card_8433.txt
< prev
next >
Wrap
Text File
|
1990-04-06
|
8KB
|
380 lines
-- card: 8433 from stack: in.0-4
-- bmap block id: 14864
-- flags: 0000
-- background id: 2767
-- name: Ex 1.2
----- HyperTalk script -----
-- The handlers for "resetBtns" and "hideFeedback" are in the stack script.
on resetCd
resetBtns
hideFeedback
end resetCd
-- part 6 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=211 top=99 right=130 bottom=422
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 174
-- text size: 12
-- style flags: 0
-- line height: 12
-- part name: HyperCard
-- part 7 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=211 top=147 right=194 bottom=422
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 174
-- text size: 12
-- style flags: 0
-- line height: 13
-- part name: Hypermedia
-- part 8 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=211 top=211 right=244 bottom=422
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 174
-- text size: 12
-- style flags: 0
-- line height: 13
-- part name: HyperTalk
-- part 9 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=211 top=266 right=299 bottom=422
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 174
-- text size: 12
-- style flags: 0
-- line height: 13
-- part name: Hypertext
-- part 11 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=145 top=87 right=141 bottom=216
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: definition1
-- part 12 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=145 top=143 right=197 bottom=216
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: definition2
-- part 13 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=145 top=199 right=253 bottom=216
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: definition3
-- part 14 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=145 top=255 right=309 bottom=216
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: definition4
-- part 2 (button)
-- low flags: 00
-- high flags: 8004
-- rect: left=57 top=90 right=139 bottom=122
-- title width / last selected line: 0
-- icon id / first selected line: 1377 / 1377
-- text alignment: 1
-- font id: 174
-- text size: 14
-- style flags: 256
-- line height: 18
-- part name: Hypermedia
----- HyperTalk script -----
-- The "dragTarg" handler is in the stack script.
on mouseStillDown
dragTarg
end mouseStillDown
-- The "dropIt" handler is in the stack script.
on mouseUp
dropIt 4
end mouseUp
-- part 3 (button)
-- low flags: 00
-- high flags: 8004
-- rect: left=57 top=146 right=195 bottom=122
-- title width / last selected line: 0
-- icon id / first selected line: 16366 / 16366
-- text alignment: 1
-- font id: 174
-- text size: 14
-- style flags: 256
-- line height: 18
-- part name: Hypertext
----- HyperTalk script -----
-- The "dragTarg" handler is in the stack script.
on mouseStillDown
dragTarg
end mouseStillDown
-- The "dropIt" handler is in the stack script.
on mouseUp
dropIt 4
end mouseUp
-- part 4 (button)
-- low flags: 00
-- high flags: 8004
-- rect: left=57 top=202 right=251 bottom=122
-- title width / last selected line: 0
-- icon id / first selected line: 29599 / 29599
-- text alignment: 1
-- font id: 174
-- text size: 14
-- style flags: 256
-- line height: 18
-- part name: HyperCard
----- HyperTalk script -----
-- The "dragTarg" handler is in the stack script.
on mouseStillDown
dragTarg
end mouseStillDown
-- The "dropIt" handler is in the stack script.
on mouseUp
dropIt 4
end mouseUp
-- part 5 (button)
-- low flags: 00
-- high flags: 8004
-- rect: left=57 top=259 right=308 bottom=122
-- title width / last selected line: 0
-- icon id / first selected line: 7094 / 7094
-- text alignment: 1
-- font id: 174
-- text size: 14
-- style flags: 256
-- line height: 18
-- part name: HyperTalk
----- HyperTalk script -----
-- The "dragTarg" handler is in the stack script.
on mouseStillDown
dragTarg
end mouseStillDown
-- The "dropIt" handler is in the stack script.
on mouseUp
dropIt 4
end mouseUp
-- part 15 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=400 top=317 right=335 bottom=459
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Done
----- HyperTalk script -----
-- This handler checks the user's answer.
-- It steps through the 4 btns, checking to see if its loc
-- matches the loc of its box (a fld). If not, the btn is moved
-- back to its original loc. If all 4 are right, feedback is shown.
on MouseUp
put 0 into numCorrect
put "2413" into correct
repeat with i=1 to 4
if loc of btn i is not loc of cd fld ("definition" & (char i of correct)) then
moveBtnBack i
else
add 1 to numCorrect
end if
end repeat
if numCorrect = 4 then ans 1,cd
end mouseUp
-- part 17 (field)
-- low flags: 81
-- high flags: 0007
-- rect: left=0 top=0 right=62 bottom=148
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: theLocs
----- HyperTalk script -----
-- This is just a little utility that updates this fld.
-- This handler puts their locs of the btns into this fld, so they can
-- be used later by "moveBtnBack" and "resetBtns".
on mouseUp
if the optionKey is down then
repeat with i = 1 to number of cd btns
put the loc of cd btn i into line i of me
end repeat
end if
end mouseUp
-- part 18 (field)
-- low flags: 81
-- high flags: 2004
-- rect: left=9 top=300 right=329 bottom=160
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 174
-- text size: 12
-- style flags: 0
-- line height: 14
-- part name: feedback
----- HyperTalk script -----
on mouseUp
hide me
end mouseUp
-- part 20 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=179 top=322 right=341 bottom=297
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Correct Answer
----- HyperTalk script -----
-- This handler shows the correct answer. It dehilites all btns,
-- then hilites the correct ones.
on mouseUp
hideFeedback
send mouseUp to cd btn "Done"
lock screen
set the loc of cd btn 1 to 180,170
set the loc of cd btn 2 to 180,282
set the loc of cd btn 3 to 180,114
set the loc of cd btn 4 to 180,226
unlock screen with visual dissolve
end mouseUp
180,170
180,282
180,114
180,226
-- part contents for background part 9
----- text -----
2 of 6
-- part contents for background part 6
----- text -----
Drag the words below into the boxes in front of their definitions. And click on the “Done” button.
-- part contents for card part 6
----- text -----
A personal programming and information management system.
-- part contents for card part 7
----- text -----
The non-linear,associational linkage of information stored in a variety of media.
-- part contents for card part 8
----- text -----
The programming language used by HyperCard.
-- part contents for card part 9
----- text -----
The creation and representation of links between text and numbers.
-- part contents for card part 17
----- text -----
89,114
89,170
89,226
89,283
429,326
238,331
-- part contents for background part 21
----- text -----
Very good!